/ Acorn RISC PD-CD 1 / Acorn RISC PD-CD 1.iso / utilities / _customise / clocks / _time / _runimage

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 1b 20 f4 3e 3c | 54 69 6d 65 24 44 69 72 |.... .><|Time$Dir|
|00000010| 3e 2e 21 52 75 6e 69 6d | 61 67 65 0d 00 14 35 20 |>.!Runim|age...5 |
|00000020| 2a 52 4d 45 6e 73 75 72 | 65 20 53 70 65 65 63 68 |*RMEnsur|e Speech|
|00000030| 21 20 31 2e 33 30 20 52 | 4d 4c 6f 61 64 20 3c 54 |! 1.30 R|MLoad <T|
|00000040| 69 6d 65 24 44 69 72 3e | 2e 53 70 65 65 63 68 21 |ime$Dir>|.Speech!|
|00000050| 0d 00 1e 40 20 2a 52 4d | 45 6e 73 75 72 65 20 53 |...@ *RM|Ensure S|
|00000060| 70 65 65 63 68 21 20 31 | 2e 33 30 20 45 52 52 4f |peech! 1|.30 ERRO|
|00000070| 52 20 59 6f 75 20 6e 65 | 65 64 20 53 70 65 65 63 |R You ne|ed Speec|
|00000080| 68 21 20 31 2e 33 30 20 | 6f 72 20 6c 61 74 65 72 |h! 1.30 |or later|
|00000090| 0d 00 28 51 20 de 20 62 | 6c 6f 63 6b 25 20 26 31 |..(Q . b|lock% &1|
|000000a0| 30 30 2c 74 62 6c 25 20 | 32 30 2c 73 70 72 69 74 |00,tbl% |20,sprit|
|000000b0| 65 5f 62 75 66 25 20 31 | 32 2c 69 63 6f 6e 5f 62 |e_buf% 1|2,icon_b|
|000000c0| 75 66 25 20 34 30 2c 62 | 6c 6f 63 6b 32 25 20 26 |uf% 40,b|lock2% &|
|000000d0| 31 30 30 2c 20 62 75 66 | 66 65 72 73 25 20 35 31 |100, buf|fers% 51|
|000000e0| 32 0d 00 32 3f 20 c8 99 | 20 22 57 69 6d 70 5f 49 |2..2? ..| "Wimp_I|
|000000f0| 6e 69 74 69 61 6c 69 73 | 65 22 2c 32 30 30 2c 26 |nitialis|e",200,&|
|00000100| 34 42 35 33 34 31 35 34 | 2c 22 21 54 69 6d 65 22 |4B534154|,"!Time"|
|00000110| 20 b8 20 2c 74 61 73 6b | 5f 68 61 6e 64 6c 65 25 | . ,task|_handle%|
|00000120| 0d 00 3c 1b 20 24 73 70 | 72 69 74 65 5f 62 75 66 |..<. $sp|rite_buf|
|00000130| 25 20 3d 20 22 21 74 69 | 6d 65 22 0d 00 46 15 20 |% = "!ti|me"..F. |
|00000140| 69 63 6f 6e 5f 62 75 66 | 25 21 30 20 3d 20 2d 31 |icon_buf|%!0 = -1|
|00000150| 0d 00 50 14 20 69 63 6f | 6e 5f 62 75 66 25 21 34 |..P. ico|n_buf%!4|
|00000160| 20 3d 20 30 0d 00 5a 14 | 20 69 63 6f 6e 5f 62 75 | = 0..Z.| icon_bu|
|00000170| 66 25 21 38 20 3d 20 30 | 0d 00 64 15 20 69 63 6f |f%!8 = 0|..d. ico|
|00000180| 6e 5f 62 75 66 25 21 31 | 32 3d 20 38 30 0d 00 6e |n_buf%!1|2= 80..n|
|00000190| 15 20 69 63 6f 6e 5f 62 | 75 66 25 21 31 36 3d 20 |. icon_b|uf%!16= |
|000001a0| 38 32 0d 00 78 17 20 69 | 63 6f 6e 5f 62 75 66 25 |82..x. i|con_buf%|
|000001b0| 21 32 30 3d 26 32 31 38 | 32 0d 00 82 1d 20 69 63 |!20=&218|2.... ic|
|000001c0| 6f 6e 5f 62 75 66 25 21 | 32 34 3d 73 70 72 69 74 |on_buf%!|24=sprit|
|000001d0| 65 5f 62 75 66 25 0d 00 | 8c 14 20 69 63 6f 6e 5f |e_buf%..|.. icon_|
|000001e0| 62 75 66 25 21 32 38 3d | 20 31 0d 00 96 1f 20 69 |buf%!28=| 1.... i|
|000001f0| 63 6f 6e 5f 62 75 66 25 | 21 33 32 3d 20 a9 28 22 |con_buf%|!32= .("|
|00000200| 21 74 69 6d 65 22 29 2b | 31 0d 00 a0 32 20 c8 99 |!time")+|1...2 ..|
|00000210| 20 22 57 69 6d 70 5f 43 | 72 65 61 74 65 49 63 6f | "Wimp_C|reateIco|
|00000220| 6e 22 2c 2c 69 63 6f 6e | 5f 62 75 66 25 20 b8 20 |n",,icon|_buf% . |
|00000230| 69 63 6f 6e 5f 73 70 69 | 74 65 25 0d 00 aa 5c 20 |icon_spi|te%...\ |
|00000240| 60 77 62 63 6f 6c 3d 31 | 30 20 3a 20 60 74 62 63 |`wbcol=1|0 : `tbc|
|00000250| 6f 6c 3d 31 32 20 3a 20 | 60 73 63 6f 3d 34 20 3a |ol=12 : |`sco=4 :|
|00000260| 20 60 6d 62 63 6f 6c 3d | 32 20 3a 20 60 77 66 63 | `mbcol=|2 : `wfc|
|00000270| 6f 6c 3d 26 37 20 3a 20 | 60 74 66 63 6f 6c 3d 37 |ol=&7 : |`tfcol=7|
|00000280| 20 3a 20 60 73 63 69 3d | 26 44 20 3a 20 60 74 62 | : `sci=|&D : `tb|
|00000290| 63 6f 6c 32 3d 26 43 0d | 00 b4 0a 20 f2 76 61 72 |col2=&C.|... .var|
|000002a0| 73 0d 00 be 42 20 de 20 | 71 25 20 26 33 30 30 2c |s...B . |q% &300,|
|000002b0| 74 65 6d 70 25 20 32 35 | 36 2c 62 75 66 66 65 72 |temp% 25|6,buffer|
|000002c0| 25 20 26 32 30 30 2c 65 | 6e 64 62 75 66 25 20 2d |% &200,e|ndbuf% -|
|000002d0| 31 20 3a 20 63 75 72 62 | 75 66 25 3d 62 75 66 66 |1 : curb|uf%=buff|
|000002e0| 65 72 25 0d 00 c8 27 20 | ee 20 85 20 c8 99 20 22 |er%...' |. . .. "|
|000002f0| 57 69 6d 70 5f 43 6c 6f | 73 65 54 65 6d 70 6c 61 |Wimp_Clo|seTempla|
|00000300| 74 65 22 3a f2 65 72 72 | 6f 72 0d 00 d2 32 20 c8 |te":.err|or...2 .|
|00000310| 99 20 22 57 69 6d 70 5f | 4f 70 65 6e 54 65 6d 70 |. "Wimp_|OpenTemp|
|00000320| 6c 61 74 65 22 2c 2c 22 | 3c 4f 62 65 79 24 44 69 |late",,"|<Obey$Di|
|00000330| 72 3e 2e 54 65 6d 70 6c | 61 74 65 22 0d 00 dc 3b |r>.Templ|ate"...;|
|00000340| 20 c8 99 20 22 57 69 6d | 70 5f 4c 6f 61 64 54 65 | .. "Wim|p_LoadTe|
|00000350| 6d 70 6c 61 74 65 22 2c | 2c 71 25 2c 74 65 6d 70 |mplate",|,q%,temp|
|00000360| 25 2c 74 65 6d 70 25 2b | 32 35 36 2c 2d 31 2c 22 |%,temp%+|256,-1,"|
|00000370| 49 6e 66 6f 22 2c 30 0d | 00 e6 27 20 c8 99 20 22 |Info",0.|..' .. "|
|00000380| 57 69 6d 70 5f 43 72 65 | 61 74 65 57 69 6e 64 6f |Wimp_Cre|ateWindo|
|00000390| 77 22 2c 2c 71 25 20 b8 | 20 69 6e 66 6f 25 0d 00 |w",,q% .| info%..|
|000003a0| f0 1c 20 c8 99 20 22 57 | 69 6d 70 5f 43 6c 6f 73 |.. .. "W|imp_Clos|
|000003b0| 65 54 65 6d 70 6c 61 74 | 65 22 0d 00 fa 06 20 f5 |eTemplat|e".... .|
|000003c0| 0d 01 04 17 20 c8 99 20 | 50 6f 6c 6c 25 2c 31 2c |.... .. |Poll%,1,|
|000003d0| 71 25 20 b8 20 41 25 0d | 01 0e 0c 20 c8 8e 20 41 |q% . A%.|... .. A|
|000003e0| 25 20 ca 0d 01 18 1d 20 | c9 20 31 20 3a 20 f2 72 |% ..... |. 1 : .r|
|000003f0| 65 64 72 61 77 5f 77 69 | 6e 64 6f 77 28 21 71 29 |edraw_wi|ndow(!q)|
|00000400| 0d 01 22 44 20 c9 20 32 | 20 3a 20 f2 6f 70 65 6e |.."D . 2| : .open|
|00000410| 5f 77 69 6e 64 6f 77 28 | 21 71 25 2c 71 25 21 34 |_window(|!q%,q%!4|
|00000420| 2c 71 25 21 38 2c 71 25 | 21 31 32 2c 71 25 21 31 |,q%!8,q%|!12,q%!1|
|00000430| 36 2c 71 25 21 32 30 2c | 71 25 21 32 34 2c 71 25 |6,q%!20,|q%!24,q%|
|00000440| 21 32 38 29 0d 01 2c 1d | 20 c9 20 33 20 3a 20 f2 |!28)..,.| . 3 : .|
|00000450| 63 6c 6f 73 65 61 77 69 | 6e 64 6f 77 28 21 71 25 |closeawi|ndow(!q%|
|00000460| 29 0d 01 36 37 20 c9 20 | 36 20 3a 20 f2 63 68 65 |)..67 . |6 : .che|
|00000470| 63 6b 6d 6f 75 73 65 28 | 21 71 25 2c 71 25 21 34 |ckmouse(|!q%,q%!4|
|00000480| 2c 71 25 21 38 2c 71 25 | 21 31 32 2c 71 25 21 31 |,q%!8,q%|!12,q%!1|
|00000490| 36 2c 71 25 21 32 30 29 | 0d 01 40 1a 20 c9 20 39 |6,q%!20)|..@. . 9|
|000004a0| 20 3a 20 f2 6d 65 6e 75 | 73 65 6c 65 63 74 28 71 | : .menu|select(q|
|000004b0| 25 29 0d 01 4a 1a 20 c9 | 20 31 37 2c 31 38 20 3a |%)..J. .| 17,18 :|
|000004c0| 20 f2 72 65 63 69 76 65 | 28 71 25 29 0d 01 54 06 | .recive|(q%)..T.|
|000004d0| 20 cb 0d 01 5e 08 20 fd | 20 a3 0d 01 68 12 20 dd | ...^. .| ...h. .|
|000004e0| f2 72 65 63 69 76 65 20 | 28 71 25 29 0d 01 72 0f |.recive |(q%)..r.|
|000004f0| 20 c8 8e 20 71 25 21 31 | 36 20 ca 0d 01 7c 21 20 | .. q%!1|6 ...|! |
|00000500| c9 20 30 3a 20 c8 99 20 | 22 57 69 6d 70 5f 43 6c |. 0: .. |"Wimp_Cl|
|00000510| 6f 73 65 44 6f 77 6e 22 | 20 3a 20 e0 0d 01 86 06 |oseDown"| : .....|
|00000520| 20 cb 0d 01 90 06 20 e1 | 0d 01 9a 37 20 dd f2 63 | ..... .|...7 ..c|
|00000530| 68 65 63 6b 6d 6f 75 73 | 65 28 6d 6f 75 73 65 78 |heckmous|e(mousex|
|00000540| 25 2c 6d 6f 75 73 65 79 | 25 2c 62 25 2c 68 61 6e |%,mousey|%,b%,han|
|00000550| 64 6c 65 25 2c 69 63 6f | 6e 25 2c 6f 62 25 29 0d |dle%,ico|n%,ob%).|
|00000560| 01 a4 0f 20 e7 20 28 62 | 25 80 32 29 20 8c 0d 01 |... . (b|%.2) ...|
|00000570| ae 11 20 c8 8e 20 68 61 | 6e 64 6c 65 25 20 ca 0d |.. .. ha|ndle% ..|
|00000580| 01 b8 09 20 c9 20 2d 32 | 0d 01 c2 27 20 f2 64 6f |... . -2|...' .do|
|00000590| 6d 65 6e 75 28 31 30 31 | 2c 22 3e 49 6e 66 6f 2c |menu(101|,">Info,|
|000005a0| 51 75 69 74 22 2c 22 54 | 69 6d 65 22 29 3a e1 0d |Quit","T|ime"):..|
|000005b0| 01 cc 06 20 cb 0d 01 d6 | 06 20 cd 0d 01 e0 0e 20 |... ....|. ..... |
|000005c0| f2 72 65 61 64 74 69 6d | 65 0d 01 ea 06 20 e1 0d |.readtim|e.... ..|
|000005d0| 01 f4 27 20 dd f2 64 6f | 6d 65 6e 75 28 68 61 6e |..' ..do|menu(han|
|000005e0| 64 6c 65 25 2c 6d 65 6e | 75 24 2c 6d 65 6e 75 74 |dle%,men|u$,menut|
|000005f0| 69 74 6c 65 24 29 0d 01 | fe 18 20 6d 65 6e 75 68 |itle$)..|.. menuh|
|00000600| 61 6e 64 6c 65 25 3d 68 | 61 6e 64 6c 65 25 0d 02 |andle%=h|andle%..|
|00000610| 08 15 20 6d 65 6e 75 70 | 74 72 25 3d 62 75 66 66 |.. menup|tr%=buff|
|00000620| 65 72 25 0d 02 12 09 20 | 69 25 3d 30 0d 02 1c 13 |er%.... |i%=0....|
|00000630| 20 6d 65 6e 75 70 74 72 | 25 21 32 30 3d 34 30 0d | menuptr|%!20=40.|
|00000640| 02 26 19 20 24 6d 65 6e | 75 70 74 72 25 3d 6d 65 |.&. $men|uptr%=me|
|00000650| 6e 75 74 69 74 6c 65 24 | 0d 02 30 4b 20 6d 65 6e |nutitle$|..0K men|
|00000660| 75 70 74 72 25 3f 31 32 | 3d 60 74 66 63 6f 6c 3a |uptr%?12|=`tfcol:|
|00000670| 6d 65 6e 75 70 74 72 25 | 3f 31 33 3d 32 3a 6d 65 |menuptr%|?13=2:me|
|00000680| 6e 75 70 74 72 25 3f 31 | 34 3d 60 77 66 63 6f 6c |nuptr%?1|4=`wfcol|
|00000690| 3a 6d 65 6e 75 70 74 72 | 25 3f 31 35 3d 60 77 62 |:menuptr|%?15=`wb|
|000006a0| 63 6f 6c 0d 02 3a 25 20 | 6d 65 6e 75 70 74 72 25 |col..:% |menuptr%|
|000006b0| 21 31 36 3d 31 39 36 2d | 32 34 3a 6d 65 6e 75 70 |!16=196-|24:menup|
|000006c0| 74 72 25 21 32 34 3d 30 | 0d 02 44 11 20 6d 65 6e |tr%!24=0|..D. men|
|000006d0| 75 70 74 72 25 2b 3d 32 | 38 0d 02 4e 32 20 f5 20 |uptr%+=2|8..N2 . |
|000006e0| 69 74 65 6d 24 3d a4 70 | 61 72 28 22 2c 22 29 3a |item$=.p|ar(","):|
|000006f0| f2 6d 65 6e 75 69 74 65 | 6d 28 69 74 65 6d 24 29 |.menuite|m(item$)|
|00000700| 3a fd 20 69 74 65 6d 24 | 3d 22 22 0d 02 58 24 20 |:. item$|=""..X$ |
|00000710| 6d 65 6e 75 70 74 72 25 | 21 2d 32 34 3d 28 6d 65 |menuptr%|!-24=(me|
|00000720| 6e 75 70 74 72 25 21 2d | 32 34 29 84 26 38 30 0d |nuptr%!-|24).&80.|
|00000730| 02 62 28 20 c8 99 20 43 | 72 4d 65 6e 75 2c 2c 62 |.b( .. C|rMenu,,b|
|00000740| 75 66 66 65 72 25 2c 6d | 6f 75 73 65 78 25 2d 36 |uffer%,m|ousex%-6|
|00000750| 34 2c 39 36 2b 38 30 0d | 02 6c 06 20 e1 0d 02 76 |4,96+80.|.l. ...v|
|00000760| 16 20 dd f2 6d 65 6e 75 | 69 74 65 6d 28 74 65 78 |. ..menu|item(tex|
|00000770| 74 24 29 0d 02 80 11 20 | e7 20 74 65 78 74 24 3d |t$).... |. text$=|
|00000780| 22 22 20 e1 0d 02 8a 10 | 20 21 6d 65 6e 75 70 74 |"" .....| !menupt|
|00000790| 72 25 3d 30 0d 02 94 35 | 20 e7 20 c0 74 65 78 74 |r%=0...5| . .text|
|000007a0| 24 2c 31 29 3d 22 3e 22 | 20 6d 65 6e 75 70 74 72 |$,1)=">"| menuptr|
|000007b0| 25 21 34 3d 69 6e 66 6f | 25 20 8b 20 6d 65 6e 75 |%!4=info|% . menu|
|000007c0| 70 74 72 25 21 34 3d 2d | 31 0d 02 9e 19 20 6d 65 |ptr%!4=-|1.... me|
|000007d0| 6e 75 70 74 72 25 21 38 | 3d 26 30 37 30 30 30 30 |nuptr%!8|=&070000|
|000007e0| 32 31 0d 02 a8 44 20 e7 | 20 c0 74 65 78 74 24 2c |21...D .| .text$,|
|000007f0| 31 29 3d 22 3e 22 20 24 | 28 6d 65 6e 75 70 74 72 |1)=">" $|(menuptr|
|00000800| 25 2b 31 32 29 3d c1 74 | 65 78 74 24 2c 32 29 20 |%+12)=.t|ext$,2) |
|00000810| 8b 20 24 28 6d 65 6e 75 | 70 74 72 25 2b 31 32 29 |. $(menu|ptr%+12)|
|00000820| 3d 74 65 78 74 24 0d 02 | b2 11 20 6d 65 6e 75 70 |=text$..|.. menup|
|00000830| 74 72 25 2b 3d 32 34 0d | 02 bc 06 20 e1 0d 02 c6 |tr%+=24.|... ....|
|00000840| 05 20 0d 02 d0 10 20 dd | a4 70 61 72 28 73 65 70 |. .... .|.par(sep|
|00000850| 24 29 0d 02 da 28 20 69 | 31 25 3d 69 25 2b 31 20 |$)...( i|1%=i%+1 |
|00000860| 3a 20 69 25 3d a7 6d 65 | 6e 75 24 2b 73 65 70 24 |: i%=.me|nu$+sep$|
|00000870| 2c 73 65 70 24 2c 69 31 | 25 29 0d 02 e4 18 20 3d |,sep$,i1|%).... =|
|00000880| c1 6d 65 6e 75 24 2c 69 | 31 25 2c 69 25 2d 69 31 |.menu$,i|1%,i%-i1|
|00000890| 25 29 0d 02 ee 19 20 dd | f2 6d 65 6e 75 73 65 6c |%).... .|.menusel|
|000008a0| 65 63 74 28 6d 65 6e 75 | 73 25 29 0d 02 f8 2e 20 |ect(menu|s%).... |
|000008b0| c8 99 20 44 63 4d 65 6e | 75 2c 2c 62 75 66 66 65 |.. DcMen|u,,buffe|
|000008c0| 72 25 2c 6d 65 6e 75 73 | 25 2c c4 32 30 30 2c 22 |r%,menus|%,.200,"|
|000008d0| 20 22 29 b8 2c 2c 2c 61 | 24 0d 03 02 10 20 e7 20 | ").,,,a|$.... . |
|000008e0| 61 24 3d 22 22 20 8c 20 | e1 0d 03 0c 15 20 c8 8e |a$="" . |..... ..|
|000008f0| 20 6d 65 6e 75 68 61 6e | 64 6c 65 25 20 ca 0d 03 | menuhan|dle% ...|
|00000900| 16 30 20 c9 20 31 30 31 | 20 3a 20 e7 20 61 24 3d |.0 . 101| : . a$=|
|00000910| 22 51 75 69 74 22 3a 20 | c8 99 20 22 57 69 6d 70 |"Quit": |.. "Wimp|
|00000920| 5f 43 6c 6f 73 65 44 6f | 77 6e 22 3a 20 e0 0d 03 |_CloseDo|wn": ...|
|00000930| 20 06 20 cb 0d 03 2a 06 | 20 e1 0d 03 34 0c 20 dd | . ...*.| ...4. .|
|00000940| f2 65 72 72 6f 72 0d 03 | 3e 1c 20 c8 99 20 22 57 |.error..|>. .. "W|
|00000950| 69 6d 70 5f 43 6c 6f 73 | 65 54 65 6d 70 6c 61 74 |imp_Clos|eTemplat|
|00000960| 65 22 0d 03 48 14 20 ee | 85 20 f2 72 65 70 6f 72 |e"..H. .|. .repor|
|00000970| 74 65 72 72 6f 72 0d 03 | 52 10 20 c8 99 20 44 72 |terror..|R. .. Dr|
|00000980| 61 67 2c 2c 2d 31 0d 03 | 5c 31 20 21 62 75 66 66 |ag,,-1..|\1 !buff|
|00000990| 65 72 25 3d 9f 3a 24 28 | 62 75 66 66 65 72 25 2b |er%=.:$(|buffer%+|
|000009a0| 34 29 3d f6 24 2b 22 20 | 61 74 20 6c 69 6e 65 20 |4)=.$+" |at line |
|000009b0| 22 2b c3 9e 2b bd 30 0d | 03 66 2c 20 c8 99 20 22 |"+..+.0.|.f, .. "|
|000009c0| 57 69 6d 70 5f 52 65 70 | 6f 72 74 45 72 72 6f 72 |Wimp_Rep|ortError|
|000009d0| 22 2c 62 75 66 66 65 72 | 25 2c 31 2c 22 21 54 69 |",buffer|%,1,"!Ti|
|000009e0| 6d 65 22 0d 03 70 1a 20 | c8 99 20 22 57 69 6d 70 |me"..p. |.. "Wimp|
|000009f0| 5f 43 6c 6f 73 65 44 6f | 77 6e 22 3a e0 0d 03 7a |_CloseDo|wn":...z|
|00000a00| 06 20 e1 0d 03 84 12 20 | dd f2 72 65 70 6f 72 74 |. ..... |..report|
|00000a10| 65 72 72 6f 72 0d 03 8e | 1b 20 85 a2 20 9f 2c f6 |error...|. .. .,.|
|00000a20| 24 2b 22 20 61 74 20 6c | 69 6e 65 20 22 2b c3 9e |$+" at l|ine "+..|
|00000a30| 0d 03 98 1a 20 c8 99 20 | 22 57 69 6d 70 5f 43 6c |.... .. |"Wimp_Cl|
|00000a40| 6f 73 65 44 6f 77 6e 22 | 3a e0 0d 03 a2 06 20 e1 |oseDown"|:..... .|
|00000a50| 0d 03 ac 3e 20 dd f2 6f | 70 65 6e 5f 77 69 6e 64 |...> ..o|pen_wind|
|00000a60| 6f 77 28 68 61 6e 64 6c | 65 25 2c 78 30 25 2c 79 |ow(handl|e%,x0%,y|
|00000a70| 30 25 2c 78 31 25 2c 79 | 31 25 2c 73 63 78 25 2c |0%,x1%,y|1%,scx%,|
|00000a80| 73 63 79 25 2c 62 68 61 | 6e 64 6c 65 25 29 0d 03 |scy%,bha|ndle%)..|
|00000a90| b6 14 20 e7 68 61 6e 64 | 6c 65 25 3d 2d 31 20 8c |.. .hand|le%=-1 .|
|00000aa0| 20 e1 0d 03 c0 25 20 71 | 25 21 30 20 3d 20 68 61 | ....% q|%!0 = ha|
|00000ab0| 6e 64 6c 65 25 3a 20 71 | 25 21 32 38 20 3d 20 62 |ndle%: q|%!28 = b|
|00000ac0| 68 61 6e 64 6c 65 25 0d | 03 ca 32 20 71 25 21 34 |handle%.|..2 q%!4|
|00000ad0| 20 3d 20 78 30 25 20 3a | 20 71 25 21 38 3d 79 30 | = x0% :| q%!8=y0|
|00000ae0| 25 3a 71 25 21 31 32 3d | 78 31 25 20 3a 20 71 25 |%:q%!12=|x1% : q%|
|00000af0| 21 31 36 20 3d 20 79 31 | 25 0d 03 d4 1c 20 71 25 |!16 = y1|%.... q%|
|00000b00| 21 32 30 3d 73 63 78 25 | 20 3a 20 71 25 21 32 34 |!20=scx%| : q%!24|
|00000b10| 3d 73 63 79 25 0d 03 de | 11 20 c8 99 20 4f 70 65 |=scy%...|. .. Ope|
|00000b20| 6e 57 2c 2c 71 25 0d 03 | e8 06 20 e1 0d 03 f2 0b |nW,,q%..|.. .....|
|00000b30| 20 dd f2 76 61 72 73 0d | 03 fc 18 20 57 69 6d 70 | ..vars.|... Wimp|
|00000b40| 3d 28 31 3c 3c 31 38 29 | 2b 28 33 3c 3c 36 29 0d |=(1<<18)|+(3<<6).|
|00000b50| 04 06 15 20 43 72 65 61 | 74 65 57 20 3d 20 57 69 |... Crea|teW = Wi|
|00000b60| 6d 70 2b 31 0d 04 10 13 | 20 4f 70 65 6e 57 20 3d |mp+1....| OpenW =|
|00000b70| 20 57 69 6d 70 2b 35 0d | 04 1a 14 20 43 6c 6f 73 | Wimp+5.|... Clos|
|00000b80| 65 57 20 3d 20 57 69 6d | 70 2b 36 0d 04 24 13 20 |eW = Wim|p+6..$. |
|00000b90| 50 6f 6c 6c 25 20 3d 20 | 57 69 6d 70 2b 37 0d 04 |Poll% = |Wimp+7..|
|00000ba0| 2e 15 20 52 65 64 72 61 | 77 57 20 3d 20 57 69 6d |.. Redra|wW = Wim|
|00000bb0| 70 2b 38 0d 04 38 15 20 | 55 70 64 61 74 65 57 20 |p+8..8. |UpdateW |
|00000bc0| 3d 20 57 69 6d 70 2b 39 | 0d 04 42 14 20 47 65 74 |= Wimp+9|..B. Get|
|00000bd0| 52 25 20 3d 20 57 69 6d | 70 2b 31 30 0d 04 4c 13 |R% = Wim|p+10..L.|
|00000be0| 20 47 65 74 57 20 3d 20 | 57 69 6d 70 2b 31 31 0d | GetW = |Wimp+11.|
|00000bf0| 04 56 13 20 47 65 74 50 | 20 3d 20 57 69 6d 70 2b |.V. GetP| = Wimp+|
|00000c00| 31 35 0d 04 60 13 20 44 | 72 61 67 20 3d 20 57 69 |15..`. D|rag = Wi|
|00000c10| 6d 70 2b 31 36 0d 04 6a | 15 20 43 72 4d 65 6e 75 |mp+16..j|. CrMenu|
|00000c20| 20 3d 20 57 69 6d 70 2b | 32 30 0d 04 74 15 20 44 | = Wimp+|20..t. D|
|00000c30| 63 4d 65 6e 75 20 3d 20 | 57 69 6d 70 2b 32 31 0d |cMenu = |Wimp+21.|
|00000c40| 04 7e 39 20 c8 99 20 22 | 4f 53 5f 53 57 49 4e 75 |.~9 .. "|OS_SWINu|
|00000c50| 6d 62 65 72 46 72 6f 6d | 53 74 72 69 6e 67 22 2c |mberFrom|String",|
|00000c60| 2c 22 57 69 6d 70 5f 53 | 65 74 43 6f 6c 6f 75 72 |,"Wimp_S|etColour|
|00000c70| 22 20 b8 20 43 6f 6c 25 | 0d 04 88 06 20 e1 0d 04 |" . Col%|.... ...|
|00000c80| 92 0f 20 dd f2 72 65 61 | 64 74 69 6d 65 0d 04 9c |.. ..rea|dtime...|
|00000c90| 23 20 3f 74 62 6c 25 3d | 33 20 3a 20 c8 99 20 22 |# ?tbl%=|3 : .. "|
|00000ca0| 4f 53 5f 57 6f 72 64 22 | 2c 31 34 2c 74 62 6c 25 |OS_Word"|,14,tbl%|
|00000cb0| 0d 04 a6 3e 20 c8 99 20 | 22 4f 53 5f 43 6f 6e 76 |...> .. |"OS_Conv|
|00000cc0| 65 72 74 44 61 74 65 41 | 6e 64 54 69 6d 65 22 2c |ertDateA|ndTime",|
|00000cd0| 74 62 6c 25 2c 62 75 66 | 66 65 72 73 25 2c 35 31 |tbl%,buf|fers%,51|
|00000ce0| 32 2c 22 25 31 32 20 25 | 4d 49 22 2b bd 30 0d 04 |2,"%12 %|MI"+.0..|
|00000cf0| b0 16 20 68 25 3d bb c0 | 24 62 75 66 66 65 72 73 |.. h%=..|$buffers|
|00000d00| 25 2c 32 29 0d 04 ba 18 | 20 6d 25 3d bb c1 24 62 |%,2)....| m%=..$b|
|00000d10| 75 66 66 65 72 73 25 2c | 34 2c 32 29 0d 04 c4 16 |uffers%,|4,2)....|
|00000d20| 20 e7 20 6d 25 3c 33 30 | 20 61 24 3d 22 50 61 73 | . m%<30| a$="Pas|
|00000d30| 74 22 0d 04 ce 26 20 e7 | 20 6d 25 3e 33 30 20 61 |t"...& .| m%>30 a|
|00000d40| 24 3d 22 32 22 20 3a 20 | 68 25 3d 68 25 2b 31 3a |$="2" : |h%=h%+1:|
|00000d50| 6d 25 3d 36 30 2d 6d 25 | 0d 04 d8 15 20 e7 20 68 |m%=60-m%|.... . h|
|00000d60| 25 3e 31 32 20 68 25 3d | 68 25 2d 31 32 0d 04 dd |%>12 h%=|h%-12...|
|00000d70| 2a 20 e7 20 6d 25 3d 31 | 20 62 24 3d 22 20 6d 69 |* . m%=1| b$=" mi|
|00000d80| 6e 75 74 65 20 22 20 8b | 20 62 24 3d 22 20 6d 69 |nute " .| b$=" mi|
|00000d90| 6e 75 74 65 73 20 22 0d | 04 de 2b 20 e7 20 6d 25 |nutes ".|..+ . m%|
|00000da0| 3d 30 20 ff 20 22 53 41 | 59 20 69 74 20 69 73 20 |=0 . "SA|Y it is |
|00000db0| 22 2b 68 25 2b 22 20 6f | 20 63 6c 6f 63 6b 22 3a |"+h%+" o| clock":|
|00000dc0| 20 e1 0d 04 e2 25 20 ff | 20 22 53 41 59 20 49 74 | ....% .| "SAY It|
|00000dd0| 20 69 73 20 22 2b c3 6d | 25 2b 62 24 2b 61 24 2b | is "+.m|%+b$+a$+|
|00000de0| 22 20 22 2b c3 68 25 0d | 04 ec 06 20 e1 0d ff    |" "+.h%.|... ... |
+--------+-------------------------+-------------------------+--------+--------+